home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 October / CHIP Turkiye Ekim 2000.iso / prog / demo / MATH / _SETUP.1 / Abt_math.exe / 0 / RCDATA / TIMZAFRM / TIMZAFRM.txt
Encoding:
Text File  |  2000-07-28  |  18.2 KB  |  622 lines
  1. object IMZAFRM: TIMZAFRM
  2.   Left = 190
  3.   Top = 102
  4.   HelpContext = 19
  5.   BorderIcons = [biSystemMenu]
  6.   BorderStyle = bsSingle
  7.   Caption = 'IMZAFRM'
  8.   ClientHeight = 582
  9.   ClientWidth = 800
  10.   Color = clBtnFace
  11.   Font.Charset = DEFAULT_CHARSET
  12.   Font.Color = clWindowText
  13.   Font.Height = -11
  14.   Font.Name = 'MS Sans Serif'
  15.   Font.Style = []
  16.   OldCreateOrder = True
  17.   Position = poScreenCenter
  18.   WindowState = wsMaximized
  19.   OnClose = FormClose
  20.   OnCreate = FormCreate
  21.   OnShow = FormShow
  22.   PixelsPerInch = 96
  23.   TextHeight = 13
  24.   object GroupBox1: TGroupBox
  25.     Left = 0
  26.     Top = 0
  27.     Width = 800
  28.     Height = 73
  29.     Align = alTop
  30.     TabOrder = 0
  31.     object AYADI: TLabel
  32.       Left = 94
  33.       Top = 18
  34.       Width = 5
  35.       Height = 16
  36.       Font.Charset = DEFAULT_CHARSET
  37.       Font.Color = clMaroon
  38.       Font.Height = -13
  39.       Font.Name = 'MS Sans Serif'
  40.       Font.Style = [fsBold]
  41.       ParentFont = False
  42.     end
  43.     object Label1: TLabel
  44.       Left = 10
  45.       Top = 18
  46.       Width = 19
  47.       Height = 16
  48.       Caption = 'Ay'
  49.       Font.Charset = DEFAULT_CHARSET
  50.       Font.Color = clMaroon
  51.       Font.Height = -13
  52.       Font.Name = 'MS Sans Serif'
  53.       Font.Style = [fsBold]
  54.       ParentFont = False
  55.     end
  56.     object Label2: TLabel
  57.       Left = 9
  58.       Top = 46
  59.       Width = 19
  60.       Height = 16
  61.       Caption = 'Y∩┐╜l'
  62.       Font.Charset = DEFAULT_CHARSET
  63.       Font.Color = clMaroon
  64.       Font.Height = -13
  65.       Font.Name = 'MS Sans Serif'
  66.       Font.Style = [fsBold]
  67.       ParentFont = False
  68.     end
  69.     object SpeedButton1: TSpeedButton
  70.       Left = 639
  71.       Top = 22
  72.       Width = 89
  73.       Height = 31
  74.       Caption = 'Yard∩┐╜m'
  75.       Font.Charset = DEFAULT_CHARSET
  76.       Font.Color = clBlack
  77.       Font.Height = -13
  78.       Font.Name = 'MS Sans Serif'
  79.       Font.Style = [fsBold]
  80.       Glyph.Data = {
  81.         76010000424D7601000000000000760000002800000020000000100000000100
  82.         04000000000000010000120B0000120B00001000000000000000000000000000
  83.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  84.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  85.         3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
  86.         33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
  87.         FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
  88.         FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
  89.         FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
  90.         FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
  91.         FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
  92.         3333333773FFFF77333333333FBFBF3333333333377777333333}
  93.       NumGlyphs = 2
  94.       ParentFont = False
  95.       OnClick = SpeedButton1Click
  96.     end
  97.     object SpinButton2: TSpinButton
  98.       Left = 109
  99.       Top = 42
  100.       Width = 20
  101.       Height = 25
  102.       DownGlyph.Data = {
  103.         0E010000424D0E01000000000000360000002800000009000000060000000100
  104.         200000000000D800000000000000000000000000000000000000008080000080
  105.         8000008080000080800000808000008080000080800000808000008080000080
  106.         8000008080000080800000808000000000000080800000808000008080000080
  107.         8000008080000080800000808000000000000000000000000000008080000080
  108.         8000008080000080800000808000000000000000000000000000000000000000
  109.         0000008080000080800000808000000000000000000000000000000000000000
  110.         0000000000000000000000808000008080000080800000808000008080000080
  111.         800000808000008080000080800000808000}
  112.       TabOrder = 0
  113.       UpGlyph.Data = {
  114.         0E010000424D0E01000000000000360000002800000009000000060000000100
  115.         200000000000D800000000000000000000000000000000000000008080000080
  116.         8000008080000080800000808000008080000080800000808000008080000080
  117.         8000000000000000000000000000000000000000000000000000000000000080
  118.         8000008080000080800000000000000000000000000000000000000000000080
  119.         8000008080000080800000808000008080000000000000000000000000000080
  120.         8000008080000080800000808000008080000080800000808000000000000080
  121.         8000008080000080800000808000008080000080800000808000008080000080
  122.         800000808000008080000080800000808000}
  123.       OnDownClick = SpinButton1DownClick
  124.       OnUpClick = SpinButton1UpClick
  125.     end
  126.     object Edit1: TEdit
  127.       Left = 32
  128.       Top = 12
  129.       Width = 46
  130.       Height = 24
  131.       Font.Charset = DEFAULT_CHARSET
  132.       Font.Color = clWindowText
  133.       Font.Height = -13
  134.       Font.Name = 'MS Sans Serif'
  135.       Font.Style = [fsBold]
  136.       ParentFont = False
  137.       TabOrder = 1
  138.       OnExit = Edit1Exit
  139.       OnKeyPress = Edit1KeyPress
  140.     end
  141.     object Edit2: TEdit
  142.       Left = 31
  143.       Top = 42
  144.       Width = 77
  145.       Height = 24
  146.       Font.Charset = DEFAULT_CHARSET
  147.       Font.Color = clWindowText
  148.       Font.Height = -13
  149.       Font.Name = 'MS Sans Serif'
  150.       Font.Style = [fsBold]
  151.       ParentFont = False
  152.       ReadOnly = True
  153.       TabOrder = 2
  154.     end
  155.     object Yaz: TBitBtn
  156.       Left = 342
  157.       Top = 22
  158.       Width = 99
  159.       Height = 31
  160.       Caption = 'Yaz'
  161.       Font.Charset = TURKISH_CHARSET
  162.       Font.Color = clWindowText
  163.       Font.Height = -15
  164.       Font.Name = 'Times New Roman'
  165.       Font.Style = [fsBold]
  166.       ParentFont = False
  167.       TabOrder = 3
  168.       OnClick = YazClick
  169.       Glyph.Data = {
  170.         76010000424D7601000000000000760000002800000020000000100000000100
  171.         04000000000000010000130B0000130B00001000000000000000000000000000
  172.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  173.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  174.         00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
  175.         8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
  176.         8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
  177.         8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
  178.         03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  179.         03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  180.         33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
  181.         33333337FFFF7733333333300000033333333337777773333333}
  182.       NumGlyphs = 2
  183.     end
  184.     object Kapat: TBitBtn
  185.       Left = 540
  186.       Top = 22
  187.       Width = 99
  188.       Height = 31
  189.       Caption = 'Kapat'
  190.       Font.Charset = TURKISH_CHARSET
  191.       Font.Color = clWindowText
  192.       Font.Height = -15
  193.       Font.Name = 'Times New Roman'
  194.       Font.Style = [fsBold]
  195.       ParentFont = False
  196.       TabOrder = 4
  197.       OnClick = KapatClick
  198.       Kind = bkClose
  199.     end
  200.     object dosopen: TBitBtn
  201.       Left = 242
  202.       Top = 22
  203.       Width = 99
  204.       Height = 31
  205.       Caption = 'Dosya ac'
  206.       Font.Charset = TURKISH_CHARSET
  207.       Font.Color = clWindowText
  208.       Font.Height = -15
  209.       Font.Name = 'Times New Roman'
  210.       Font.Style = [fsBold]
  211.       ParentFont = False
  212.       TabOrder = 5
  213.       OnClick = dosopenClick
  214.       Glyph.Data = {
  215.         76010000424D7601000000000000760000002800000020000000100000000100
  216.         04000000000000010000130B0000130B00001000000000000000000000000000
  217.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  218.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
  219.         333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
  220.         0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  221.         07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
  222.         07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
  223.         0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
  224.         33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
  225.         B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
  226.         3BB33773333773333773B333333B3333333B7333333733333337}
  227.       NumGlyphs = 2
  228.     end
  229.     object BitBtn1: TBitBtn
  230.       Left = 441
  231.       Top = 22
  232.       Width = 99
  233.       Height = 31
  234.       Caption = '∩┐╜zelyaz'
  235.       Font.Charset = TURKISH_CHARSET
  236.       Font.Color = clWindowText
  237.       Font.Height = -15
  238.       Font.Name = 'Times New Roman'
  239.       Font.Style = [fsBold]
  240.       ParentFont = False
  241.       TabOrder = 6
  242.       OnClick = BitBtn1Click
  243.       Glyph.Data = {
  244.         76010000424D7601000000000000760000002800000020000000100000000100
  245.         04000000000000010000130B0000130B00001000000000000000000000000000
  246.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  247.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  248.         00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
  249.         8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
  250.         8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
  251.         8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
  252.         03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  253.         03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  254.         33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
  255.         33333337FFFF7733333333300000033333333337777773333333}
  256.       NumGlyphs = 2
  257.     end
  258.   end
  259.   object DBGrid1: TDBGrid
  260.     Left = 0
  261.     Top = 73
  262.     Width = 800
  263.     Height = 509
  264.     Align = alClient
  265.     DataSource = DataSource1
  266.     Font.Charset = DEFAULT_CHARSET
  267.     Font.Color = clWindowText
  268.     Font.Height = -11
  269.     Font.Name = 'MS Sans Serif'
  270.     Font.Style = [fsBold]
  271.     Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
  272.     ParentFont = False
  273.     ReadOnly = True
  274.     TabOrder = 1
  275.     TitleFont.Charset = DEFAULT_CHARSET
  276.     TitleFont.Color = clMaroon
  277.     TitleFont.Height = -11
  278.     TitleFont.Name = 'MS Sans Serif'
  279.     TitleFont.Style = [fsBold]
  280.     OnDblClick = DBGrid1DblClick
  281.     Columns = <
  282.       item
  283.         Expanded = False
  284.         FieldName = 'SCNO'
  285.         Title.Caption = 'Sicil'
  286.         Width = 45
  287.         Visible = True
  288.       end
  289.       item
  290.         Expanded = False
  291.         FieldName = 'SSK-SICIL-NO'
  292.         Title.Caption = 'SSK Sicil no'
  293.         Visible = True
  294.       end
  295.       item
  296.         Expanded = False
  297.         FieldName = 'PADI'
  298.         Title.Caption = 'Personel Ad∩┐╜'
  299.         Visible = True
  300.       end
  301.       item
  302.         Expanded = False
  303.         FieldName = 'GEL-GUN'
  304.         Title.Caption = 'Cls-Gun'
  305.         Width = 45
  306.         Visible = True
  307.       end
  308.       item
  309.         Expanded = False
  310.         FieldName = 'BRUT-UCRET'
  311.         Title.Caption = 'Br∩┐╜t Ucret'
  312.         Width = 95
  313.         Visible = True
  314.       end
  315.       item
  316.         Expanded = False
  317.         FieldName = 'OZEL-IND'
  318.         Title.Caption = 'Indirim Toplam∩┐╜'
  319.         Width = 95
  320.         Visible = True
  321.       end
  322.       item
  323.         Expanded = False
  324.         FieldName = 'SSK-MAT'
  325.         Title.Caption = 'Sig.Matrah∩┐╜'
  326.         Width = 95
  327.         Visible = True
  328.       end
  329.       item
  330.         Expanded = False
  331.         FieldName = 'SSK-ISCI-PRM'
  332.         Title.Caption = 'SSK ∩┐╜∩┐╜ci Primi'
  333.         Visible = True
  334.       end
  335.       item
  336.         Expanded = False
  337.         FieldName = 'TTES-ISCI-PRM'
  338.         Title.Caption = 'T.Tes.∩┐╜∩┐╜ci'
  339.         Visible = True
  340.       end
  341.       item
  342.         Expanded = False
  343.         FieldName = 'GVM-MATA'
  344.         Title.Caption = 'GV.Matrah∩┐╜'
  345.         Width = 95
  346.         Visible = True
  347.       end
  348.       item
  349.         Expanded = False
  350.         FieldName = 'GELIR-VERGI'
  351.         Title.Caption = 'Gel.Vergisi'
  352.         Width = 95
  353.         Visible = True
  354.       end
  355.       item
  356.         Expanded = False
  357.         FieldName = 'DAMGA-VERGI'
  358.         Title.Caption = 'D.Vergisi'
  359.         Width = 95
  360.         Visible = True
  361.       end
  362.       item
  363.         Expanded = False
  364.         FieldName = 'KES-TOP'
  365.         Title.Caption = 'Kesinti Top.'
  366.         Width = 95
  367.         Visible = True
  368.       end
  369.       item
  370.         Expanded = False
  371.         FieldName = 'NET-UCRET'
  372.         Title.Caption = 'Net Ucret'
  373.         Width = 95
  374.         Visible = True
  375.       end>
  376.   end
  377.   object MAASTAB: TTable
  378.     OnCalcFields = MAASTABCalcFields
  379.     DatabaseName = 'C:\MATH\21998'
  380.     Filtered = True
  381.     OnFilterRecord = MAASTABFilterRecord
  382.     TableName = 'PERMAAS.DB'
  383.     Left = 624
  384.     Top = 86
  385.     object MAASTABYIL: TSmallintField
  386.       FieldName = 'YIL'
  387.     end
  388.     object MAASTABAY: TSmallintField
  389.       FieldName = 'AY'
  390.     end
  391.     object MAASTABSCNO: TSmallintField
  392.       FieldName = 'SCNO'
  393.     end
  394.     object MAASTABTIGUN: TSmallintField
  395.       FieldName = 'TIGUN'
  396.     end
  397.     object MAASTABGELGUN: TSmallintField
  398.       FieldName = 'GEL-GUN'
  399.     end
  400.     object MAASTABGECGUN1: TSmallintField
  401.       FieldName = 'GEC-GUN1'
  402.     end
  403.     object MAASTABULIIZIN1: TSmallintField
  404.       FieldName = 'ULI-IZIN1'
  405.     end
  406.     object MAASTABUSIZIZIN1: TSmallintField
  407.       FieldName = 'USIZ-IZIN1'
  408.     end
  409.     object MAASTABGECSAAT: TFloatField
  410.       FieldName = 'GEC-SAAT'
  411.     end
  412.     object MAASTABGECGUN2: TSmallintField
  413.       FieldName = 'GEC-GUN2'
  414.     end
  415.     object MAASTABULIIZIN2: TSmallintField
  416.       FieldName = 'ULI-IZIN2'
  417.     end
  418.     object MAASTABUSIZIZIN2: TSmallintField
  419.       FieldName = 'USIZ-IZIN2'
  420.     end
  421.     object MAASTABFMESAI1: TFloatField
  422.       FieldName = 'F-MESAI1'
  423.     end
  424.     object MAASTABFMESAI2: TFloatField
  425.       FieldName = 'F-MESAI2'
  426.     end
  427.     object MAASTABFMESAI3: TFloatField
  428.       FieldName = 'F-MESAI3'
  429.     end
  430.     object MAASTABFMESAI4: TFloatField
  431.       FieldName = 'F-MESAI4'
  432.     end
  433.     object MAASTABGVAR: TFloatField
  434.       FieldName = 'G-VAR'
  435.     end
  436.     object MAASTABNMESTOP: TCurrencyField
  437.       FieldName = 'N-MES-TOP'
  438.       DisplayFormat = '###,##0'
  439.     end
  440.     object MAASTABFMESTOP1: TCurrencyField
  441.       FieldName = 'F-MESTOP1'
  442.       DisplayFormat = '###,##0'
  443.     end
  444.     object MAASTABFMESTOP2: TCurrencyField
  445.       FieldName = 'F-MESTOP2'
  446.       DisplayFormat = '###,##0'
  447.     end
  448.     object MAASTABFMESTOP3: TCurrencyField
  449.       FieldName = 'F-MESTOP3'
  450.       DisplayFormat = '###,##0'
  451.     end
  452.     object MAASTABFMESTOP4: TCurrencyField
  453.       FieldName = 'F-MESTOP4'
  454.       DisplayFormat = '###,##0'
  455.     end
  456.     object MAASTABGECEVTOP: TCurrencyField
  457.       FieldName = 'GECE-V-TOP'
  458.       DisplayFormat = '###,##0'
  459.     end
  460.     object MAASTABEKODETOP: TCurrencyField
  461.       FieldName = 'EK-ODE-TOP'
  462.       DisplayFormat = '###,##0'
  463.     end
  464.     object MAASTABCOCUKYAR: TCurrencyField
  465.       FieldName = 'COCUK-YAR'
  466.       DisplayFormat = '###,##0'
  467.     end
  468.     object MAASTABSOSYARTOP: TCurrencyField
  469.       FieldName = 'SOS-YAR-TOP'
  470.       DisplayFormat = '###,##0'
  471.     end
  472.     object MAASTABEKKESTOP: TCurrencyField
  473.       FieldName = 'EK-KES-TOP'
  474.       DisplayFormat = '###,##0'
  475.     end
  476.     object MAASTABEKKESISV: TCurrencyField
  477.       FieldName = 'EK-KES-ISV'
  478.       DisplayFormat = '###,##0'
  479.     end
  480.     object MAASTABVDISIEKODE: TCurrencyField
  481.       FieldName = 'VDISI-EK-ODE'
  482.       DisplayFormat = '###,##0'
  483.     end
  484.     object MAASTABVDISIEKKES: TCurrencyField
  485.       FieldName = 'VDISI-EK-KES'
  486.       DisplayFormat = '###,##0'
  487.     end
  488.     object MAASTABBRUTUCRET: TCurrencyField
  489.       FieldName = 'BRUT-UCRET'
  490.       DisplayFormat = '###,##0'
  491.     end
  492.     object MAASTABSSKMAT: TCurrencyField
  493.       FieldName = 'SSK-MAT'
  494.       DisplayFormat = '###,##0'
  495.     end
  496.     object MAASTABSSKISCIPRM1: TCurrencyField
  497.       FieldName = 'SSK-ISCI-PRM1'
  498.       DisplayFormat = '###,##0'
  499.     end
  500.     object MAASTABSSKISCIPRM2: TCurrencyField
  501.       FieldName = 'SSK-ISCI-PRM2'
  502.       DisplayFormat = '###,##0'
  503.     end
  504.     object MAASTABSSKISCIPRM3: TCurrencyField
  505.       FieldName = 'SSK-ISCI-PRM3'
  506.       DisplayFormat = '###,##0'
  507.     end
  508.     object MAASTABSSKISCIPRM4: TCurrencyField
  509.       FieldName = 'SSK-ISCI-PRM4'
  510.       DisplayFormat = '###,##0'
  511.     end
  512.     object MAASTABSSKISCIPRM5: TCurrencyField
  513.       FieldName = 'SSK-ISCI-PRM5'
  514.       DisplayFormat = '###,##0'
  515.     end
  516.     object MAASTABSSKISCIPRM6: TCurrencyField
  517.       FieldName = 'SSK-ISCI-PRM6'
  518.       DisplayFormat = '###,##0'
  519.     end
  520.     object MAASTABSSKISVPRM1: TCurrencyField
  521.       FieldName = 'SSK-ISV-PRM1'
  522.       DisplayFormat = '###,##0'
  523.     end
  524.     object MAASTABSSKISVPRM2: TCurrencyField
  525.       FieldName = 'SSK-ISV-PRM2'
  526.       DisplayFormat = '###,##0'
  527.     end
  528.     object MAASTABSSKISVPRM3: TCurrencyField
  529.       FieldName = 'SSK-ISV-PRM3'
  530.       DisplayFormat = '###,##0'
  531.     end
  532.     object MAASTABSSKISVPRM4: TCurrencyField
  533.       FieldName = 'SSK-ISV-PRM4'
  534.       DisplayFormat = '###,##0'
  535.     end
  536.     object MAASTABSSKISVPRM5: TCurrencyField
  537.       FieldName = 'SSK-ISV-PRM5'
  538.       DisplayFormat = '###,##0'
  539.     end
  540.     object MAASTABSSKISVPRM6: TCurrencyField
  541.       FieldName = 'SSK-ISV-PRM6'
  542.       DisplayFormat = '###,##0'
  543.     end
  544.     object MAASTABTTESISCIPRM: TCurrencyField
  545.       FieldName = 'TTES-ISCI-PRM'
  546.       DisplayFormat = '###,##0'
  547.     end
  548.     object MAASTABTTESISVPRM: TCurrencyField
  549.       FieldName = 'TTES-ISV-PRM'
  550.       DisplayFormat = '###,##0'
  551.     end
  552.     object MAASTABTASMAT: TCurrencyField
  553.       FieldName = 'TAS-MAT'
  554.       DisplayFormat = '###,##0'
  555.     end
  556.     object MAASTABOZELIND: TCurrencyField
  557.       FieldName = 'OZEL-IND'
  558.       DisplayFormat = '###,##0'
  559.     end
  560.     object MAASTABGELIRVERGI: TCurrencyField
  561.       FieldName = 'GELIR-VERGI'
  562.       DisplayFormat = '###,##0'
  563.     end
  564.     object MAASTABGVMMATA: TCurrencyField
  565.       FieldName = 'GVM-MATA'
  566.       DisplayFormat = '###,##0'
  567.     end
  568.     object MAASTABGVMMATY: TCurrencyField
  569.       FieldName = 'GVM-MATY'
  570.       DisplayFormat = '###,##0'
  571.     end
  572.     object MAASTABUCRIZINMAT: TCurrencyField
  573.       FieldName = 'UCR-IZIN-MAT'
  574.       DisplayFormat = '###,##0'
  575.     end
  576.     object MAASTABDAMMAT: TCurrencyField
  577.       FieldName = 'DAM-MAT'
  578.       DisplayFormat = '###,##0'
  579.     end
  580.     object MAASTABDAMGAVERGI: TCurrencyField
  581.       FieldName = 'DAMGA-VERGI'
  582.       DisplayFormat = '###,##0'
  583.     end
  584.     object MAASTABNETUCRET: TCurrencyField
  585.       FieldName = 'NET-UCRET'
  586.       DisplayFormat = '###,##0'
  587.     end
  588.     object MAASTABSSKSICILNO: TStringField
  589.       FieldKind = fkCalculated
  590.       FieldName = 'SSK-SICIL-NO'
  591.       Size = 13
  592.       Calculated = True
  593.     end
  594.     object MAASTABPADI: TStringField
  595.       FieldKind = fkCalculated
  596.       FieldName = 'PADI'
  597.       Calculated = True
  598.     end
  599.     object MAASTABSSKISCIPRM: TCurrencyField
  600.       FieldKind = fkCalculated
  601.       FieldName = 'SSK-ISCI-PRM'
  602.       DisplayFormat = '###,##0'
  603.       Calculated = True
  604.     end
  605.     object MAASTABKESTOP: TCurrencyField
  606.       FieldKind = fkCalculated
  607.       FieldName = 'KES-TOP'
  608.       DisplayFormat = '###,##0'
  609.       Calculated = True
  610.     end
  611.   end
  612.   object DataSource1: TDataSource
  613.     DataSet = MAASTAB
  614.     Left = 690
  615.     Top = 80
  616.   end
  617.   object PrintDialog1: TPrintDialog
  618.     Left = 546
  619.     Top = 80
  620.   end
  621. end
  622.